#!/usr/bin/perl

my $a;
$a = 42;
print $a . "\n";
